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GENERAL DESCRIPTION 
DESK/CALC Is a program which provides the user with an 
interactive desk calcutator capability from a 81890/B81700 SPO or 
remote terminal. It provices the following features. 


1e Arithmetic cperands may be arbitrarily long. Aithough 
there are initial defaults» the user can subsequently 
change the number cf digits (bits) of preciston. 


Ze Real Ci.ee.» floating point) arithmetic is performed. 


36 Twenty~six generai registers are provided for 
intermediate results» constants» etc. | 


bo Includes cperators for exponentiation» factorial» and 
real and integer division. 


Se Includes functions for greatest commen divisor (GCDB) 
and least common multiple CLCM). 


6. Overfiow is checked for and reported. : 


Input itn the form of expressions and assignment statements is 
entered to DESK/CALC. Results say be displayed for the user 
and/or printed on the printer in both decimat.and/or hexadecimal; 
ail options can be determined by the user. 


toa 
as 
gr 
= 
fared 
mM 
to 
Ico 
im 
Too) 
ic 
\-z 
CS 
j= 
im 
{4 
Prag 
ico 
al 


Name Number 


oe 26 Gh aK mec ah Bs Th ey 


81700 Software Gperaticnal Guide 10687 31 


2-1 


BURRCUGHS CORPORATION | 3 COMPANY CONFIDENTIAL 
COMPUTER SYSTEMS GRCUP B1800/B1700 DESK/CALC 
SANTA BARBARA PLANT I1eP.S- 52219 0383-C€A) 


OPERATING INSTRUCTIONS 


At BOJe DESK/CALC interrcgates the external name of the file 


RMTE.° If this is blanks (which is the default)» it assumes that 
the user is running frem a SPO and all further communication is 
dane via ACCEPTs anc DISPLAYs at the SPO. If the external name 
of RMTE is nonsblank» . the user is assumed to be running from a 
remote file of that name. 


SAMPLE EXECUTE STATEMENTS 


Execution from a SPC: 

2EX DESK/CALC 
Execution through CANDE: | 

2EX DESK/CALE FI RMTE NAM <remote filename>- 
Execution through M*xAeS*«Hs | 

RUN DESK/CALC FI RATE NAME iy non blank text> 
After DESK/CALC has been executeds the user may immediately begin 


entering either program input or controt options. The default 
size for ait operands is a thirty-four digit number inctuding 


 twenty~“six integer cigits plus eight fraction digits. 


Example: 


12345678901234567690123456.12345678 


The operand size may be changed using the RESTART control option. 


i 


ERAS TOI Nb rR EBSA ADU aA IRE SR PIC a eRe tr VU Ao RD A ERY PANE R ED OLE NINA ALT SDT Mane Hi UHRA yee oe a tr a RODE YARDS NY 2 Ae GR NEA ONO SEARLE A aA AEE aS ENRON PhS HEP ARN PSH AR Yo Faun Noe rn Dae ARG NRAI Reb N TE Sr BUNNY Se POP TARR SO SPO ETE TE SRST He aa rir VOU Ae end a, wind eet Bide Sp SARK es F ee SMa Athyn sro EA rds Bl nace Scand De eMart UE fet 4 baler Side ARE af ave ee tee a fe ep abe Sl RU od Ml fi Se puch Ite on sre Ue AE tit Men es Rese ation Sha be Os bib He/  aeh ic ese We tne APPEAR eA, Yi aiid ML kel aha Senate hale te acre OR 


| 3-1 
BURROUGHS CORPORATION COMPANY CONFIDENTIAL 
COMPUTER SYSTEMS GROUP B1800/81700 DESK/CALC 
SANTA BARBARA PLANT | 1sPeSe 2219 0383 CA) 


PROGRAM INPUT 


The user types in a line at the SPO or from a remote terminal. A 


tine may contain one or more expressions or assignment 
Statementse each separated by a semicoton. The final result of 
the evaluation of each expression or statement will de displayed 
for the user. Expressions consist of a sequence of operands and 


binary and unary operators.— 


OPERANDS 
Operands may be: 


1. decimal constants 

20 hexadecimal strings 

32 register references 

4-2 functton invocations 


DECIMAL CONSTANTS 


Decimat constants may be entered with or without a decimal point 
and fraction. if the fraction part is targer than the current 
Haxi mun» it wiil be truncated with a warning message. Results 
are printed with a fraction part if the value is not an integer» 
otherwise as an integer without a decimal point. 


Examples: 


4232 
3e0 Cinput only - output would be "5") 
18. 


“7.2 
5e14359265358979 


HEXADECIMAL CONSTANTS 
A hexadecimal constant may be entered by enclosing it in "a" 
Signs. | | 


Examples: 

aF Oa © 

aFACEO149 

a065709a | 
PO4LIL3STI4SZIZABCDEQ 
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REGISTERS 


Twenty-six general registers are inctuded> nea "A™ through "7". 
Each is initialized to zero at 380J Cand also if the "RESTART® 
option ts used). A register may be used anywhere an operand is 
required. . | 


FUNCTIONS 


A predefined function reference may be used anywhere an operand 
3s required. The BNF for a function reference is? 


<FNCeREFERENCE> 33= <FNCANAME>/<ENCONAME> CKARGeLIST>) 


<ARGeLIST> $3= <EXPRESSION>/<ARG-sLIST> » <EXPRESSIOQN> 
<FNCoNAME> 23= GCD / LCN / PI 
SEMANTICS 


As the syntax FAdGcatees two functions are currently implemented: 
the Greatest Common Oivisor function and the Least Common 
Multiple function. Both are functions of exactly two arguments. 
Also» the value of PI is available Cup to fifty decimal disits). 


CPERATORS 
Recognized binary operators inctude: 


+ addition 
-“ sudtraction 
* multiplication 
f reat division 
‘f/f Integer division 

kt exponentiation 
# moadutlo 

“> Left to right Seetonwent 
= intermediate assignnrent 


Recognized unary operators are: 


+ identity 
- negation 
i factorial Cexclamation point) 


An arbitrary number of unary operators Zay precede an operand. 
Expressions are evatuated using a pure left to right scan. There 
1S no operator precedences but parentheses may be used to change 
the order of evaluation. Integer overflow is checked for on all 
cperations and wiiil be reported if found. a 
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ASSIGNMENTS 


Three types of assigqnments are defined: 


An assiaqnment statement (=) begins with a register name fottlonred 


re aibh: <e wee 


by an equal signe The final value of the expression evaluation 
as stored in the designated register. 


Examples: 


R= 3 
A = 3014159 & (Ree?) 
intermediate assignment (=): Since each binary operator has 
higher precedence than any operator toa its right» a special 
convention hoids for intermediate assignment: the intermediate 
assignment must be nested in parentheses. The result of the 


evaluation of the expression at that parenthesis tevet replaces 
the designated register. 


Exampiess 


2 ¢#¢6 * €( J =&) 
D=CA=J"1) + 7 


Left to cight assignment ({->) The tleft to right assignment 
operator (€the *DASH*™ character foliowed by a “greater than” 
character) assigns the value of the expression to its Left to the 
register named on tts right. 


Exampies: 
4 => R 


Re*e2 «£ (€3.1415926535 => F} => A 
2* P « F -> € 
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MULTIPLE STATEMENTS 


for conveniences several expressions (statements) may be entered 
an one line. Each must be separated by a semicoton. The result 
of each evaluation wilt be displayed. 


Examples: 


5 3 A= 17613 18.2, -> J 
15273 
RESTRICTIONS 


Since the up arrow Cused for exponentiaticn) is not avaitable on 
a 10800» either an apostrophe or double asterisk. (xx) may be used 
instead. 


User input is restricted to the top of the screen when terminat 


‘input is used from a TD8C0- 
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are on by default). 
the option off. 
ease of reference. 
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LINES <#> 
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OPTIONS 


PRINTER 


REGISTERS CREGS) 


RESTART 
SCROLL 


«SPO 
—6S$5 <msg> 


STATUS 
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The foliowing are control cptions (those marked with an asterisk 
Precectng an cption with “NO" or *NOT"™ turns 
The options are listed in aiphabetical order for 


provides hard copy on the tine printer 
of the entire DESK/CALC. ‘session up to 
that point | 

results to be shoun In decimal 


results to be shown in hexadecimal 


Gispiays on the screen the most recent 
terminal activity 


changes the number of lines of the 
screen to <#>. The cGefault is 12» the 
Maximum ts 24. 


results of expressions and statements 
evaluated should be displayed (Cprinted) 


cisplays the names of all known controt 
options 


print results on printer 


displays the current vatues of the 


twenty~six DESK/CALC registers 


the user wishes to dectare anew data 
size ~ ‘all registers are zeroed and the 
program requests new operand sizes from 
the user. , 


DESK/CALC wilt scroit ait output. The 
terminal shoutd be tn non=SCROLL mode 


when sending the “SCROLL™ command to 


DESK/CALC. 
display resuits on the SPO 
<msg> is displayed on the SPQ 


displays the jobts mix numbers job 


numbers terminal times etc. 
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STOP terminate the job 
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ZIP <msg> <msg> is zipped to the MCP 
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EXAMPLE OF DESK/CALC USAGE 


EX DESK/CALC 
DESK/CALC = 1 BOJ. #2238 PR=4 TIME = 17:33: 


17-6 


% DESK/CALC =1 OEFAULT OPERAND SIZE IS 26 INTEGER DIGITS PLUS 8 


FRACTION CIGifts 
% DESK/CALC =1 READY TO BEGIN eo ee 


DESK /CALC =1 ACCEPT. 


LAX2 **# 21. 

Z DESK/CALC = 1 2 2097152 

DESK/CALC =1 ACCEPT. 

LAX A = PI*(21.2342%2) 

%Z DESK/CALC =1 2 14152489953879919161 
DESK/CALC =1 ACCEPT. 

1AX B=73 C =2— 

Z DESK/CALC = 12: 7 

% DESK/CALC = 12 2 

DESK/CALC =1 ACCEPT. 

LAX D = Be"2 (4*AxC) : 

% DESK/CALC =1 2 711282.9919631039353288 


bout 


DESK /CALC =1 ACCEPT. 
LAX PI 


(% DESK/CALE =1 2 3.141592653589793 
DESK/CALC =1 ACCEPT. 

LAXQ= GCD(7> 644) 3 L = LCM(2.7) 

%Z DESK/CALC =1 2 1 

% DESK/CALC =1 3 14 

DESK/CALC =1 ACCEPT. | 

LAX GCD(23#141eLCMC902)) 3% 22/7 -> PF 22/7 


% DESK/CALC =1 *%° 6 
% BDESK/CALC =b 3 32142857142857143 
Z OESK/CALC =1 3 § 


DESK /CALC =1 ACCEPT. 


LAXSTOP : | , 
DESK /CALC =i ECU. #=238 TIME = 172372329 
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